modeltime tutorial

Prerrequisites

library(modeltime)
library(tidyverse)
library(lubridate)
library(timetk)
library(parsnip)
library(rsample)
library(reactable)

interactive <- TRUE

1 Collect data and split into training and test sets

Fetching the data:

m750 <- m4_monthly %>% filter(id == "M750")

Plotting it:

m750 %>%
  plot_time_series(date, value, .interactive = interactive)

Registered S3 method overwritten by 'data.table':
  method           from
  print.data.table